home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Disk 64 1996 1
/
Power_Disk_64_96-01_1996_Lagune_de_Side_A.d64
/
axl cool
(
.txt
)
next >
Wrap
Commodore BASIC
|
2023-02-26
|
3KB
|
43 lines
1 print"[147][159]":poke53280,0:poke53281,0
2 print" [208][207][215][197][210] [196][201][211][203] 64 -[160][208][210][197][214][201][197][215] von "
3 print"[145] [193]xl [195]ool [193]nd [212]he [214]enus [208]unker ([193]rcade) "
4 print"1993 erschien das [212]ext-[193]dventure [196][201][197] [193][194][197][206][212][197][213][197][210] [196][197][211] [193][216][204] [195][207][207][204] ([194]escheuerter"
5 print"[206]ame fuer ein [199]ame).[203]urz darauf begann die [193]rbeit an einem [193]rcade [199]ame mit"
6 print"dem neuen [200]elden.3 [202]ahre spaeter will der [208]rogrammierer (also ich) endlich"
7 print"das [211]piel zu seiner [218]ufriedenheit be- enden.[196]as grosse [208]roblem in 3 [202]ahren"
8 print"war:[196]as [211]hoot'em [213]p-[195]onstruction [203]it. [214]iele kennen wahrscheinlich vor allem
9 [153]"chr$(NULL)(NULL)ascright$chr$left$(NULL)val(NULL)(NULL) aus einem 64'er (NULL)left$.str$ieses chr$ame wurde auch mit diesem (NULL)it ent-"
10 [153]"worfen.(NULL)eider ist dieses (NULL)it ziemlich beschraenkt.right$rgendwie musste sich"
11 [153]"das chr$ame aber wenigstens von anderen chr$ames,wie z.peek. (NULL)(NULL)atnlenval-(NULL)atnlenval,unter-"
12 [153]"scheiden.atnlso wurde schnell 3 (NULL)elten entworfen.mid$ede besteht aus 3 (NULL)eveln,
13 print"einem [197]ndgegnerscreen und einer [194]onus- [210]unde.[200]at man das [211]piel durch,dann"
14 geta$:ifa$=""then14
15 print"muss man nochmal anfangen.[196]er einzigste [214]orteil an dieser [205]acke des [203]its:"
16 print"man kann seinen [211]core verbessern.[215]ie punktet man eigentlich ?"
17 print"[193]ls erstes stuerzt [193]xl erstmal auf der [214]enus ab.[218]u seiner [198]reude ist er"
18 print"nicht hin,aber er ist in einer [215]ueste.[196]aauf der ganzen [214]enus [208]unker ihr [213]n-"
19 print"wesen treiben,sind diese sogar in der [215]ueste.[193]xl muss nun diese abknallen"
20 print"und [194]onus-[195][196]s sammeln.[196]afuer gibt es [208]unkte.[194]ei bestimmter [208]unktzahl gibt
21 [153]"es auch ein valxtra-(NULL)eben.str$er valndgegner ist dann ein echt feuriges (NULL)kelett,"
22 [153]"das die (NULL)unker anbeten.right$n der zweiten (NULL)elt ist man in etwas gruenerer"
23 [153]"(NULL)andschaft.left$ier gibt es jetzt keine toedlichen (NULL)reibsandloecher,aber"
24 [153]"peekuesche mit giftigen (NULL)tacheln.str$er valnd- gegner ist jetzt wieder das (NULL)kelett,
25 print"aber diesmal doppelt ! [196]as [211]kelett ist naemlich nur am hoechsten [208]unkt der"
26 print"stark renovierten [214]enus zu killen.[202]edes-mal,wenn es sonst gekillt wird,be-"
27 geta$:ifa$=""then27
28 print"kommt es ein neues [204]eben hinzu ! [193]ber umin der [215]ildnis an den [211]keletten vor-
29 [153]"beizukommen muss atnxl die beiden ent- weder killen oder abwarten bis es"
30 [153]"von alleine weiterzieht.str$ie getoeteten (NULL)unker einer (NULL)elt kann es naemlich"
31 [153]"nach einer bestimmten (NULL)eit auch zu einempeekonus-(NULL)eben verwandeln.(NULL)an hat es"
32 [153]"daher in der 3.(NULL)elt automatisch mit 3 valndgegnern zu tun.str$ie 3. (NULL)elt ist"
33 [153]"natuerlich das chr$ebirge und hat auch seine spezielle (NULL)uecke."
34 [153]"str$as atnrcade chr$ame von atnxl lenool wird nicht ueberragend - aber ein netter (NULL)eit-"
35 [153]"vertreib,vor allem,wenn man zu zweit den(NULL)ampf aufnimmt."
36 [161]a$:[139]a$[178]""[167]36
50 [151]828,0
51 [153] [199](147) [199](17)
52 [153] "load"[199](34);"spielet*";[199](34);",8
53 printchr$(17)chr$(17)chr$(17)chr$(17)"run"
54 poke 631,13:poke632,13:poke198,2
55 print chr$(19);:end